home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 193
- Top = 156
- BorderIcons = [biSystemMenu, biMinimize]
- BorderStyle = bsSingle
- Caption = 'CyberLoop 1.2a'
- ClientHeight = 205
- ClientWidth = 411
- Ctl3D = False
- Color = clGreen
- Font.Color = clBlack
- Font.Height = -15
- Font.Name = 'Arial'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- KeyPreview = True
- Menu = MainMenu1
- PixelsPerInch = 96
- Scaled = False
- OnClose = FormClose
- OnCreate = FormCreate
- OnKeyPress = FormKeyPress
- OnMouseDown = FormMouseDown
- OnMouseMove = FormMouseMove
- OnPaint = FormPaint
- TextHeight = 17
- object Image1: TImage
- Left = 4
- Top = 8
- Width = 320
- Height = 32
- Picture.Data = {<image001.bmp>}
- Visible = False
- end
- object Image2: TImage
- Left = 8
- Top = 48
- Width = 220
- Height = 22
- Picture.Data = {<image002.bmp>}
- Visible = False
- end
- object Panel1: TPanel
- Left = 339
- Top = 0
- Width = 72
- Height = 205
- Align = alRight
- BevelInner = bvLowered
- TabOrder = 0
- object lstep1: TLabel
- Left = 8
- Top = 22
- Width = 53
- Height = 17
- AutoSize = False
- end
- object lcycle: TLabel
- Left = 4
- Top = 2
- Width = 63
- Height = 17
- AutoSize = False
- end
- object lstep2: TLabel
- Left = 4
- Top = 39
- Width = 66
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- end
- object lscore: TLabel
- Left = 2
- Top = 86
- Width = 68
- Height = 17
- Alignment = taCenter
- AutoSize = False
- end
- object ldbl: TLabel
- Left = 2
- Top = 63
- Width = 68
- Height = 17
- Alignment = taCenter
- AutoSize = False
- end
- object Backbtn: TSpeedButton
- Left = 8
- Top = 108
- Width = 57
- Height = 20
- Caption = 'Back'
- OnClick = BackbtnClick
- end
- end
- object MainMenu1: TMainMenu
- Left = 8
- Top = 80
- object Game1: TMenuItem
- Caption = '&Game'
- object New1: TMenuItem
- Caption = '&New'
- OnClick = New1Click
- end
- object Restart1: TMenuItem
- Caption = '&Restart'
- OnClick = Restart1Click
- end
- object N1: TMenuItem
- Caption = '-'
- end
- object Exit1: TMenuItem
- Caption = 'E&xit'
- OnClick = Exit1Click
- end
- end
- object Options1: TMenuItem
- Caption = '&Options'
- object Property1: TMenuItem
- Caption = '&Property'
- OnClick = Property1Click
- end
- object Bigpanel1: TMenuItem
- Caption = '&Bigpanel'
- OnClick = Bigpanel1Click
- end
- end
- object Help1: TMenuItem
- Caption = '&Help'
- object Index1: TMenuItem
- Caption = '&Index'
- OnClick = Index1Click
- end
- object About1: TMenuItem
- Caption = '&About'
- OnClick = About1Click
- end
- end
- end
- end
-